Top 10k strings from Racing Manager (1983)(Virgin Games).z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
6 MEETING=25 5 CLASS*4000 5 (MEETING/9 5 (MEETING/7 4 F(SECOND,1 4 *a)+((r$(c,1 3 S(L(A,SECOND),3 3 ;": VALUE `";L(A,13 3 ;" AND ";CLASS+2 3 ))+(L(A,13 2 do>class-2 2 do<class+2 2 S(H(HORSE,1 2 PRIZE MONEY =PRIZE MONEY+L(A,13 2 DO>CLASS-2 2 DO<CLASS+2 2 DO<CLASS*4000 2 CO+" "+N$(H(C,1 2 CHS=L(A,FIRST) 2 );" FURLONGS" 2 ),V)="1"): 2 )*(S(H(NO,1 2 (S(H(HORSE,1 2 (F(THIRD,1 2 (F(SECOND,1 2 (F(FIRST,1 2 ((S(H(NO,1 2 ((MON-SMON)*.3 2 ''"NOW ";S(H(HO,1 2 "which one ? (enter 1 2 "Enter new name"' 2 `";L(A,13 1 r$(l(a,dis),1 1 mon=mon-50 1 meeting=h(8 1 do>CLASS-2 1 do<CLASS+2 1 dis=first: 1 day (only horses which have won a race from their last six will be accepted)." 1 class*4000 1 a;" ";T$(A): 1 a$=a$+a$+a$: 1 a$=a$+a$+a$ 1 a$="SAVE 0645" 1 Z$="THIRD "+N$(L(A,THIRD))+" " 1 YOUR HORSE JUST WON THE DERBY !! 1 YOU LOST MONEY THIS SEASON 1 Y$="SECOND "+N$(L(A,SECOND))+" ": 1 X=NO.OF HORSES 1 X$=X$+"GS" 1 X$=X$+"GF" 1 X$="MTG. "+ 1 WINNERS DAY 1 W$="FIRST "+N$(L(A,FIRST))+" ": 1 URGENT MESSAGE 1 The next meeting number is " 1 TRAINER :";T$(T, 1 TOTAL=TOTAL+H(A,3 1 TOTAL=TOTAL+F(B,1 1 THIRD PLACED PRIZE MONEY 1 THIRD WYELEA 1 THE WINNER IS 1 STEWARDS ENQUIRY 1 STAKE>5000 1 SKILL=SKILL+1 1 SECOND YOZZER 1 SECOND PLACED PRIZE MONEY 1 R$(L(A,THIRD),7 1 R$(L(A,THIRD),1 1 R$(L(A,SECOND),7 1 R$(L(A,SECOND),1 1 R$(L(A,FIRST),7 1 R$(L(A,FIRST),1 1 R$(L(A,C),1 1 R$(A)="/"+R$(A,1 1 PRIZE MONEY=PRIZE MONEY+L(A,13 1 PRIZE MONEY=0 1 PRESS 0 TO LINE PRINT RESULT 1 P=STAKE*(F(BHO,1 1 NO QUALIFIERS IN YOUR STABLES 1 MON=MON-H(NO,3 1 MON=MON-EX: 1 MON=MON-90 1 MON=MON-700 1 MON=MON-470 1 MON=MON-250 1 MON=MON-220 1 MON=MON+H(NO,3 1 MON=MON+GAMB+PRIZE MONEY-ENTRY FEES- 1 MEETING=MEETING+1 1 MEETING=30 1 LOSERS DAY 1 L(A,CX)=B: 1 IA DERRINGER 1 H.CECIL 50000 L.PIGGOTTW.HERN 40000 W.CARSON P.WALWYN 30000 P.EDDERY F.DURR 20000 J.MERCER 1 GAMBLING BALANCE ` 1 GAMB=GAMB-STAKE: 1 GAMB=GAMB+P 1 FIRST SNAKE BITE 1 ENTRY FEES=ENTRY FEES+CLASS*125 1 ENTRY FEES=0 1 E=E+(R$(h(c,1 1 E=E+(R$(H(C,1 1 E=E+(R$(B,V)="1"): 1 DISQUALIFIED 1 CONGRATULATIONS 1 CLASS=(A*3 1 CHS=L(A,THIRD) 1 CHS=L(A,SECOND) 1 ;x;" ";t$(x,19 1 ;x;" ";t$(x, 1 ;meeting +1 1 ;R$(L(A,B), 1 ;N$(L(A,HO));" SELECTED","ODDS ARE :"; 1 ;C;" ";N$(L(A,C)),: 1 ;;N$(H(NO,1 1 ;"` = VALUES # = LIST + = EXIT": 1 ;"YOU BACKED THE WINNER": 1 ;"YOU ARE OFFERED THIS HORSE "'"DO YOU WANT HIM? " 1 ;"TRAINER FEE 1 ;"SELECT SKILL LEVEL" 1 ;"SALE PRICE `";H(NO,3 1 ;"Racing Manager"; 1 ;"MONEY LEFT `";MON-EX; 1 ;"HORSE NAME 1 ;"GOING IS ";: 1 ;"FURLONG ";F: 1 ;"FOR HORSES WITH A SPEED FACTOR BETWEEN ";CLASS-2 1 ;"ENTER HORSE NUMBER OR 99" 1 ;"DISTANCE ";L(A,12 1 ;"Author : Mark Alexander." 1 ;"0 = COPY: ANY TO CONTINUE" 1 ;" AND `";CLASS*4000 1 99 to load a saved game "; 1 -T-(SKILL/3 1 --- RESULT STANDS --- 1 *a)+((r$(c,2 1 )=S(L(A,SECOND),3 1 )=(TOTAL/F(B,1 1 )="D")*400 1 )="3")*100 1 )="2")*200 1 )="1")*300 1 )="1")*100 1 )="0"+R$(L(A,C),1 1 )<CLASS*4000 1 );" FURLONGS";: 1 );" FURLONGS": 1 );" ";s(h(a,1 1 );" ";a$(Z*2 1 )*(S(H(A,1 1 ));B;" ";N$(L(A,B)); 1 ));" SOLD FOR `";H(NO,3 1 ));" RUNNING" 1 ));" ACCEPTED"'"ENTRY FEE IS `";CLASS*125 1 ));" ";H(A,3 1 ))+"% S="+ 1 ))+"% FIT "+ 1 )'"NOW HAVE `";: 1 (S(L(A,B),1 1 (R$(L(A,THIRD),7 1 (R$(L(A,SECOND),7 1 (R$(L(A,FIRST),7 1 (MON/((smon/100 1 (GOING-S(c,4 1 (D(SECOND,1 1 (D(FIRST,1 1 ((RTE+WHAT)/SEA): 1 ("WHICH HORSE DO YOU WISH TO BACK?enter 1 to ";x); 1 '''"SAVE GAME SELECTED"''"INPUT 99 TO CONTINUE": 1 '''" PRESS TO"''" 1 ''"SEASON :- ";SEA 1 ''"S = SPEED RATING"'"F = FITNESS %"'"D = BEST DISTANCE"'"G = PREFFERED GOING" 1 ''"Old name : ";t$(ho,19 1 ''"Old name : ";t$(ho, 1 ''"INVALID ENTRY": 1 ''"Horse name not found try again": 1 ''"ENTRY FEES `";ENTRY FEES'"PRIZE MONEY `";PRIZE MONEY 1 ''"CREDITORS MEETING IS THE LAST STRAW"''"YOU DO THE HONOURABLE THING." 1 ''"CASH BEFORE RACING `";MON 1 ''"ALL ENTRIES FOR THIS MEETING NOW 1 ''"1 (learner) TO 9 (mastermind)" 1 '"WEEKLY BALANCE `";MON-X 1 '"TOTAL ENTRY FEES :`";ENTRY FEES: 1 '"THIS HORSE IS ";S(H(HORSE,1 1 '"STABLE JOCKEY :";T$(T,18 1 '"RACE VOID. INSUFFICIENT ENTRY.": 1 '"RACE :";A;" 1 '"Meeting number 25 is 1 '"MANAGERIAL RATING "; 1 '"FINANCE NOW `";MON 1 '"FEES ARE PER HORSE PER SEASON" 1 '"Every seventh meeting is 1 '"Every ninth meeting is LOSERS day (only horses which have 1 '"DO YOU WISH TO ENTER HIM FOR THERACE ? (Y/N)" 1 '"CONCERNING "; 1 '"CASH REMAINING `";MON 1 '"All meetings except the DERBY are classed in speed factors." 1 '"ALL SPEED FACTORS ARE CALCULATEDON THE SUCCESS OF THE HORSE LASTSEASON. PRIZE MONEY APPLIES ONLYTO THE CURRENT SEASON." 1 '": VALUE `";L(A,13 1 "new name is ";a$, 1 "` ";STAKE 1 "YOU WON `";P: 1 "WHILST TRAINING TODAY THE ANIMALWAS SEEN TO BE MISSING A STRIDE.UPON EXAMINATION A PULLED TENDONWAS FOUND."''"HORSE NOW 40% FIT": 1 "WHICH HORSE TO SELL? (1 1 "VALUE IS "; 1 "TRAINING FEE `"; 1 "THIS HORSE SPRAINED A LIGAMENT ON THE MORNING GALLOPS": 1 "THIS HORSE IS SUFFERING WITH A TUMMY BUG"''"NOW ONLY 72% FIT": 1 "THIS HORSE INJURED HIMSELF WHILEKICKING MY NEW ROLLS"'"PANEL BEATERS AND RESPRAY `700"''"NOW ONLY 65% FIT": 1 "THIS HORSE HAS THROWN A SHOE": 1 "THIS HORSE HAS A COUGH"''"CALL OUT VET (NIGHT CALL) SUPPLYDRUGS AND HEATED STABLES `250"''"NOW ONLY 45% FIT": 1 "THIS HORSE HAS A CHILL"''"CALL OUT VET EXAMINE AND SUPPLY DRUGS AND HEATED STABLES `220"''"NOW ONLY 55% FIT": 1 "THIS ANIMAL HAS CONTRACTED 1 "THE GAME IS SAVED IN FIVE PARTS" 1 "TAX MAN TAKES 30% OF YOUR PROFIT"'"STARTED WITH `";SMON'"ENDED WITH `";MON'"30 % TAX = "; 1 "Start tape": 1 "REWIND AND START TAPE" 1 "RE-REGISTRATION FEE `50": 1 "PRIZE MONEY `";L(A,13 1 "PLEASE WAIT WHILST RACE IS RUN": 1 "PICK YOUR TRAINER"''"TRAINER 1 "Name too long (Max. 8 1 "Name too long (Max. 10 1 "Name Too long (Max. 13 1 "MEETING NUMBER ";MEETING;" RACE NUMBER ";A'"GOING :- ";: 1 "LOAD GAME SELECTED" 1 "I THINK THIS HORSE HAS VERY GOODDERBY PROSPECTS :";T$(T, 1 "I DON'T THINK THIS HORSE WOULD WIN A DONKEY DERBY :";T$(T, 1 "HOW MUCH ? (10-5000)"; 1 "HORSES IN TRAINING `VAL `PRIZE": 1 "HIS SPEED FACTOR IS "; 1 "HIS BEST DISTANCE IS ";S(H(HORSE,1 1 "HE PREFERS ";: 1 "GOODBYE!": 1 "GOOD TO SOFT "; 1 "GOOD TO FIRM "; 1 "FOR HORSES THAT HAVE WON BETWEEN`";CLASS*4000 1 "FOR HORSES THAT HAVE NOT WON PRIZE MONEY AND WITH A SPEED FACTOR BETWEEN ";CLASS-2 1 "Enter the horse name you wish toalter "; 1 "ENTER THE NEW NAME"' 1 "ENTER 99 TO CONTINUE"; 1 "DO YOU WANT TO SELL A HORSE ?"; 1 "DO YOU WANT TO CONTINUE ?": 1 "CURRENT FORM - ";R$(H(HORSE,1 1 "CHOICE ? ENTER 0 IF NO ENTRY"; 1 "CASH IN HAND `";MON'"TOTAL LIVESTOCK `";TOTAL'" 1 "Any key to hold listing": 1 "ALL SAVED INPUT 99 TO VERIFY"; 1 "ALL HORSES": 1 "ALL HORSES IN OUR STABLES HAVE CONTRACTED A VIRUS. THE VET SAYSTHAT IT IS NOT SERIOUS BUT OUR TRAINING SCHEDULE HAS BEEN BADLYAFFECTED."''"ALL HORSES NOW ONLY 50% FIT"'"VETERINARY FEES `360"'"SPECIAL CARE CHARGES `580"''"50 % OF THESE CHARGES HAVE BEEN UNDERTAKEN BY OURSELVES.": 1 "ADDRESS ";ADR: 1 never won prize money qualify)." 1 ` FEE STABLE JOCKEY": 1 WITH A SPEED FACTOR BETWEEN ";CLASS-2 1 WINTER SUN PEACETIME DUST STORM GAMBLING LAD ICE STREAM DIRTY DUCK CAKE WALKER RUN FREE 1 WATERED DOWN LAST TRUMP CORNISH PIE STAR OF A 1 VIRGIN GAMES LTD. 1 VIRGIN GAMES 1983"; 1 TWO TON TESS BOBBY'S DREAMDOPEY GO 1 TURF ACCOUNTANT" 1 TROJAN SECRETCREE SONG EIGHT BALL CROWN 1 TRAINING REPORT FOR"'" 1 TO WATCH WHOLE RACE OR ANY KEY TO SEE THE FINAL FURLONGDISTANCE IS ";l(a,12 1 TIMEKEEPER GATEWAY 1 TAX DODGE MOST CUNNING BEDBUG 1 SWEET SCENT HAPPY DAYS OLD THUNDER BE MY GUEST MAINSAIL 1 SPANISH WINE MAYOTTE 1 SNAKE BITE THE DOLPHIN FLASHBACK NITPICKER FISHWIFE 1 SHARP TAXI EXPEDITIOUS EQUANAID 1 SAVE GAME" 1 S FORM ODDS" 1 S F FORM D G" 1 ROMAN ROAD GONE FISHING POLARIS 1 ROLLERBALL MUMMYS PET FRENCH FRIAR THE WALL 1 REPORT FINANCES" 1 RENE'S PET DRUMROAN 1 RED ROBIN THE BANDSMAN HOT BRICK TUDOR ROSE PUCKMAN 1 O I OYSTON TIME MACHINE OCTAVIA GIRL FLUKE 1 NOBLE PRINCE WESTERN NEWS BLACK PIGEON SWEETPEA 1 NIGHT PROWLERFITTER 1 MOTHER IN LAWDANCING LIGHTCHICKWEED BANANA SPLIT DATSTORNIT SLIPPERY DICKLOONY LOOP POLICEMAN POP MUSIC PARK LANE GOLF BALL DON'S DONKEY YOZZER 1 MARKING TIME MARCHING ON BASTION MEWS POKE MY RIBS SURE CLOWN MR MAGOO 1 MAN OF SPIRITACCUSED 1 M.ALEXANDER 1 List HORSE names"''" 1 LOAD GAME" 1 LIST HORSES" 1 LIST FIXTURES" 1 LEVEL ";SKILL 1 HALEY'S COMETRAGAMUFFIN SPRINGTIME BEANSMEANS CORNFLAKE WESTWARD HO! DRAGON PALACETHE BOXER BREADWINNNER WHISKY MAC BELLRINGER SMART BOMB FLASHY MOTOR DON'T PANIC VIDEO KING WACKY WAITER KEYSTONE COP SPLURGE 1 FROM STABLES 1 FIT S DIST/GOING 1 FIT DIST/GOING 1 EQUINE FLU."''"VETERINARY CHARGE `90"'"FITNESS NOW 60%": 1 ENTER RACES" 1 END OF RACING SEASON" 1 DIAL A DISC HIGH WIRE SPARK PLUG INTERFACE INDIAN JOE GREENPEACE HALF A CROWN JILLS' PONY WAVELENGTH CUTTING EDGE MOONDANCER ROUND TRIP HILL OF SLANEWISHING WELL X RATED 1 CUT ABOVE ROXY MUSIC SLY FOX 1 COSTALOTTA ROSY LEE 1 COME ON DAD MYSTIC MULE ARABIAN NIGHTHERCULES 1 CHANGE TRAINER" 1 CAPTAIN KIRK MOBY DICK ELEVATOR 1 BLUE SWAN WHITE DOVE SPRINGY 1 Alter TRAINER name"''" 1 Alter JOCKEY name"''" 1 Alter HORSE name"''" 1 ALTER NAMES" 1 ACCEPTED" 1 ";N$(H(HORSE,1 1 To qualify for the DERBY a horsemust win more than `80000 in prize money. Other races this day are classed by prize money." 1 :VALUE `";a*4000 1 ***","FOR HORSES THAT HAVE WON MORE THAN `80000 THIS SEASON." 1 END OF RACE REPORT 1 DISTANCE :";L(A,12 1 ANY TO CONTINUE":